Xbasic

A5_SPLIT_URL Function

Syntax

URL_Data as P = a5_split_url(C url [,L urlencode ])

Arguments

URL_Data

A dot variable containing the following components:

page
password
path
port
protocol
query_string
server
username

url

The URL to parse for its components.

urlencode

Logical. Default = .F. .T. = URL encode filename portion of URL. .F. = do not encode filename portion of URL.

Description

The A5_SPLIT_URL() function parses a URL for its components and returns them as elements of a dot variable.

Discussion

Example

dim dat as P
?a5_split_url("http://www.foo.com:9999/lala.html")
= page = "lala.html"
password = ""
path = ""
port = 9999
protocol = "http"
query_string = ""
server = "www.foo.com"
username = ""
dat = a5_split_url("http://myusername:[email protected]/folder1/page1.asp?company=Alpha")
? dat
= page = "page1.asp"
password = "mypass"
path = "folder1/"
protocol = "http"
query_string = "company=Alpha"
server = "server1.mydomain.com"
username = "myusername"
? a5_split_url("http://msgboard2.alphasoftware.com/alphaphorum/files/200508/d2tw/19/119/before and after images.doc").page
= "before and after images.doc"
? a5_split_url("http://msgboard2.alphasoftware.com/alphaphorum/files/200508/d2tw/19/119/before and after images.doc",.t.).page
= "before%20and%20after%20images.doc"